﻿
Public Class CSachThanhLyDTO

    Private m_iMa As Integer
    Public Property Ma() As Integer
        Get
            Return m_iMa
        End Get
        Set(ByVal value As Integer)
            m_iMa = value
        End Set
    End Property


    Private m_sTen As String
    Public Property Ten() As String
        Get
            Return m_sTen
        End Get
        Set(ByVal value As String)
            m_sTen = value
        End Set
    End Property



    Private m_iMaNhanVien As Integer
    Public Property MaNhanVien() As Integer
        Get
            Return m_iMaNhanVien
        End Get
        Set(ByVal value As Integer)
            m_iMaNhanVien = value
        End Set
    End Property



    Private m_sTenLyDo As String
    Public Property TenLyDo() As String
        Get
            Return m_sTenLyDo
        End Get
        Set(ByVal value As String)
            m_sTenLyDo = value
        End Set
    End Property

    Public Sub New()

    End Sub

    'Public Sub New(ByVal dgvr As DataRowView)
    '    Me.m_iMa = dgrv.Cell("clMaSach").values


    'End Sub

End Class
